home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZCLRSCR.C < prev    next >
Text File  |  1988-12-18  |  861b  |  32 lines
  1. /*
  2. ┌────────────────────────────────────────────────────────────────────────────┐
  3. │jzclrscr.c                                     │
  4. │Clear the display screen with the global screen window and colors.         │
  5. │Usage: jzclrscr();                                 │
  6. │                                         │
  7. │Notes: use window(),color() etc to set these attributes.             │
  8. │                                         │
  9. │ (C) JazSoft Software by Jack A. Zucker (301) 794-5950              │
  10. └────────────────────────────────────────────────────────────────────────────┘
  11. */
  12. #include <jaz.h>
  13. extern int _row1,_col1,_row2,_col2,_attr;
  14. jzclrscr()
  15. {
  16.   TREG wreg;
  17.  
  18.   wreg.h.ah = 6;
  19.   wreg.h.al = 0;
  20.   wreg.h.ch = _row1;
  21.   wreg.h.cl = _col1;
  22.   wreg.h.dh = _row2;
  23.   wreg.h.dl = _col2;
  24.   wreg.h.bh = _attr;
  25.   #if DEBUG
  26.     printf("%x %x %x %x %x",wreg.h.ah,wreg.h.al,wreg.x.cx,wreg.x.dx,
  27.        wreg.h.bh);
  28.     getch();
  29.   #endif
  30.   intr(0x10,&wreg);
  31. }
  32.